home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1995 October
/
EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso
/
Aminet
/
comm
/
misc
/
avmNfax1_33.lha
/
AVMSuite
/
source
/
silentanswer.avmsrc
< prev
next >
Wrap
Text File
|
1994-06-24
|
3KB
|
190 lines
startrecord=true
label=
nodetype=7
filename=avm:rexx/stdhead.avm
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=8
line1=parse arg servername faxscript datascript distinctivering 'CID$' acidname '$' acidnumber '$'
line2=
line3=call setclip(address() || 'CIDNAME', acidname)
line4=call setclip(address() || 'CIDNUMBER', acidnumber)
line5=
line6=
line7=
line8=
line9=
line10=
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=14
comment=Initialize log entry
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=8
line1=handle = makeUniqueFile()
line2=call initLogEntry()
line3=log.type = 'Silent'
line4=mailbox = 'silent'
line5=
line6=
line7=
line8=
line9=
line10=
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=14
comment=Put beep in here if you want
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=readkeyagain
nodetype=4
timeout=90
numkeys=1
untilkey=0
keyactiontype=0
keyactionaction=possiblechoice
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=3
busyactionaction=
timedoutactiontype=3
timedoutactionaction=
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=14
comment=Put another beep in here if you want
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=finished
nodetype=14
comment=Save log entry
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=8
line1=
line2=log.comment = 'Nothing done with Silent Answer'
line3=
line4=call saveLogEntry(mailbox, handle)
line5=
line6=
line7=
line8=
line9=
line10=
nextactiontype=2
nextactionaction=exit
endrecord=true
startrecord=true
label=possiblechoice
nodetype=8
line1=select
line2= when value = '2' then signal stdfax
line3= when value = '1' then signal dorecord
line4= when value = '5' then signal stddata
line5= when value = '*' then signal stdabort
line6=
line7= otherwise nop
line8=end
line9=
line10=
nextactiontype=0
nextactionaction=finished
endrecord=true
startrecord=true
label=dorecord
nodetype=8
line1=call time('r')
line2=
line3=
line4=
line5=
line6=
line7=
line8=
line9=
line10=
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=0
filename=handle
recordinglength=120
silenceinterval=-1
silencethreshold=-1
keyactiontype=3
keyactionaction=
quietactiontype=3
quietactionaction=
silenceactiontype=3
silenceactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=3
busyactionaction=
timedoutactiontype=3
timedoutactionaction=
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=8
line1=log.type = 'Voice'
line2=log.length = trunc(time('e'))
line3=log.filename = handle
line4=
line5=
line6=
line7=
line8=
line9=
line10=
nextactiontype=0
nextactionaction=finished
endrecord=true
startrecord=true
label=
nodetype=7
filename=avm:rexx/simplestdtail.avm
nextactiontype=3
nextactionaction=
endrecord=true